home *** CD-ROM | disk | FTP | other *** search
/ MacHack 1994 / MacHack 1994.toast / MacHack™ 1987-1994 / MacHack™ '90 / Source Code ƒ.sea / Source Code ƒ / MPW C ƒ / BIOMORƒ / Biomorph.c / Biomorph.c.rsrc < prev    next >
Encoding:
Text File  |  1990-06-15  |  570 b   |  22 lines  |  [TEXT/MPS ]
  1.     2 RËTEXTMPS o our
  2.              * global work buffer, then allocate some memory
  3.              * for it and copy it over.
  4.              */
  5.             ungetcharacter( '{' );
  6.             len = act_compile( Workbuf );
  7.  
  8.             if ( Rulep && Rulep->action )
  9.             {
  10.                 Rulep->nextrule =
  11.                     (RULE *)getmem(sizeof(RULE));
  12.                 Rulep = Rulep->nextrule;
  13.                 fillmem( Rulep, sizeof(RULE), 0 );
  14.             }
  15.             if ( !Rulep )
  16.             {
  17.                 /*
  18.                  * This is the first action encountered.
  19.                  * Allocate the first Rules structure and
  20.                  * initialize it
  21.                  */
  22.                 Rules = Rul